For n = 0 To 24
IF( $Player(n) == "" )
THEN
Do something
ENDIF
Next n
#================#
#Drifting options#
#================#
$DriftDatabase = "./DriftPB.txt";
Event DriftPBAction()
cmdLFS( "/rcm " . $Nickname . "^3 made new PB: ^7" . $DriftScore . " ^3pts!" );
cmdLFS( "/rcm_all" );
EndEvent
Event DriftPBAction()
cmdLFS( "/msg " . $Nickname . "^3 made new PB: ^7" . $DriftScore . " ^3pts!" );
EndEvent
Event DriftLapAction()
cmdLFS("/msg " . $Nickname . " ^3drifted to ^7" . $DriftScore . " ^3pts" );
EndEvent
Event OnDriftScore()
privMsg( "Score: ^7" . $DriftScore . " ^3+" . $LastDriftScore );
EndEvent
$GoodDriftScore = 2500; # Value to be reached to execute action on good drift score
####### you can change the 4000 to anything you want - higher or lower number to suit
Event GoodDriftAction()
privMsg( $Nickname . " ^3made excellent drift: ^7" . $LastDriftScore . " ^3pts" );
EndEvent
$MinimumDriftScore = 10; # Minimum drift score required
####### you can change the 250 to anything you want - higher or lower number to suit
# Actions to do at end of lap if MinimumDriftScore is not achieved.
Event DriftTooLowAction()
privMsg( $Nickname . "^3 disqualified" );
cmdLFS( "/spec " . $Nickname };
EndEvent
$MinimumDriftSpeed =20; # Minimum speed in km/h to maintain. Driving below that speed will reset score
$MinimumDriftAngle =15; # Minimum angel to maintain. When angle is below value, score is reset
$MaximumDriftAngle =100; # Maximum angel to maintain. When angle is above value, score is reset
####################################################
#Actions to do on splits relative to trackinfo.cfg#
####################################################
#Local variable: {SplitTime} - Split time
#-------------------------------------------------------------------
Sub TRI_split1_0()
cmdLFS( "/msg Amazing 1st split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split1_1()
cmdLFS( "/msg Great 1st split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split1_2()
cmdLFS( "/msg Good 1st split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split2_0()
cmdLFS( "/msg Amazing 2nd split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split2_1()
cmdLFS( "/msg Great 2nd split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split2_2()
cmdLFS( "/msg Good 2nd split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split3_0()
cmdLFS( "/msg Amazing 3rd split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split3_1()
cmdLFS( "/msg Great 3rd split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_split3_2()
cmdLFS( "/msg Good 3rd split (" . $SplitTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_lap_0()
cmdLFS( "/msg Amazing lap (" . $LapTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_lap_1()
cmdLFS( "/msg Great lap (" . $LapTime . ") by " . $Nickname . "^8!" );
EndSub
Sub TRI_lap_2()
cmdLFS( "/msg Good lap (" . $LapTime . ") by " . $Nickname . "^8!" );
EndSub
[COLOR=red]USERNAME 02[/COLOR]
tim nl
^7[^1N^7L^4R^7]^6Tim
1
25/12/2008
01:35
UFR
1.14.75
SO6
0.34.82
0.00.00
0.00.00
0.32.37
0.00.00
0.00.00
0.39.93
##################
#Drifting options#
##################
# This is the filepath for a file containing the collected data.
# This file will be created if it doesnt exist yet.
# You must ensure read/write access to this path.
#-------------------------------------------------------------------
$DriftDatabase = "./DriftPB";
# Actions to do on new personal best drift lap.
Event DriftPBAction()
cmdLFS( "/msg " . $Nickname . "^3 made new PB: ^7" . $DriftScore . " ^3pts!" );
EndEvent
# Actions to do to when total lap drift score is higher or equal to MinimumDriftScore.
Event DriftLapAction()
cmdLFS("/msg " . $Nickname . " ^3drifted to ^7" . $DriftScore . " ^3pts" );
EndEvent
# Message to get on end of each drift.
# Possible variables to use:
Event OnDriftScore()
privMsg( "Score: ^7" . $DriftScore . " ^3" . $LastDriftScore );
EndEvent
$GoodDriftScore = 4000; # Value to be reached to execute action on good drift score
Event GoodDriftAction()
privMsg( $Nickname . " ^3made excellent drift: ^7" . $LastDriftScore ." ^3pts" );
EndEvent
$MinimumDriftScore = 10; # Minimum drift score required
# Actions to do at end of lap if MinimumDriftScore is not achieved.
/*
Event DriftTooLowAction()
privMsg( $Nickname . "^3 disqualified" );
cmdLFS( "/spec " . $Nickname };
EndEvent
*/
$MinimumDriftSpeed = 50; # Minimum speed in km/h to maintain. Driving below that speed will reset score
$MinimumDriftAngle = 15; # Minimum angel to maintain. When angle is below value, score is reset
$MaximumDriftAngle = 100; # Maximum angel to maintain. When angle is above value, score is reset